Top 10k strings from Golf (1983)(Abrasco)(16k).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
10 tw,tn+tn;" 4 ))))))))))))))))))) 3 s(p)=s(p)+j: 3 golf 3 (a(p),b(p))=th+fo 2 t(p)=t(p)+j 2 l(tw)>l(j) 2 )((((((((66 2 (a(p),b(p))=39 2 (a(p),b(p))= 1 z,z;n$(j);":";s(j); 1 z,pos;p(n);" OVER" 1 z,pos;"LEVEL" 1 yp=y(p)+n*w+ye*n*n+yw*n*n 1 y(tw)=y(j): 1 y(p)=y(p)-d*w-ye*d^tw-yw*d^tw: 1 y(p)=y(p)+d*w: 1 y(p)+d*w<tn+fv 1 xp=x(p)+n*v+xe*n*n+xw*n*n: 1 x(tw)=x(j): 1 x(p)=x(p)-d*v-xe*d^tw-xw*d^tw: 1 x(p)=x(p)+d*v: 1 x(p)+d*v<th 1 tw,z;"WIND ";s$;" FORCE "; 1 tw*n-tw,tn+tw-n; 1 tn+tw,tn+fv;" 1 tn+th,fv;" 1 tn+j,tn+j;" 1 t(tw)<t(j) 1 t(p)=t(p)+j: 1 t(j)<t(tw) 1 t(j),t(tw),bl,ph,fg,bg,lg,rg,x(j),y(j),xf,yf,a,b,c,d,e,f,g,i,le 1 py,y(p)+n*w: 1 py,y(p)+(n-d/tn/tw)*w: 1 py,y(p)+(n-d/tn)*w+ye*(n-d/tn)*(n-d/tn)+yw*(n-d/tn)*(n-d/tn): 1 px,x(p)+n*v: 1 px,x(p)+(n-d/tn/tw)*v: 1 px,x(p)+(n-d/tn)*v+xe*(n-d/tn)*(n-d/tn)+xw*(n-d/tn)*(n-d/tn): 1 pos=th+fo: 1 po=ta-le-ri: 1 picture 1 p(p)=p(p)+t(p)-ph 1 p(n);" UNDER" 1 o,v,w,xe,ye 1 n=fv+fo*(g-e) 1 n,tn+tw;" "; 1 n,tn+tw+fo*(i-f);" ": 1 n$(tw,tw+j): 1 n$(j),"PLAYER 2 "; 1 le;" yds"; 1 j,tn+fo;"20 ft" 1 ho,p,zo,a(j),b(j),a(tw),b(tw),h: 1 fv+fo*(g-e)+th: 1 fv*cm,n+th*tn: 1 cm/tw,th*tn 1 cm,th/tw*c*n 1 cm,th*tn-n*c: 1 cm,n+fv+j: 1 cm,j/fv*n: 1 cm,fv*tn-n: 1 a$="THIS IS A GAME OF GOLF FOR TWO PLAYERS, ALTHOUGH ONE PERSON CAN PLAY BY TAKING THE PART OF BOTH PLAYERS." 1 WD<ZO","N","WD<3*ZO","NW","WD<5*ZO","W","WD<7*ZO","SW","WD<9*ZO","S","WD<11*ZO","SE","WD<13*ZO","E","WD<15*ZO","NE" 1 START TAPE": 1 PRESS ANY KEY TO CONTINUE": 1 PRESS ANY KEY TO CONTINUE" 1 PRESS ANY KEY TO CONTINUE 1 PATHETIC!!! ";t(p) 1 OUT OF BOUNDS" 1 ON GREEN": 1 HOLE IN ONE!!!!" 1 Golf 1 GAME OVER" 1 EAGLE!! ";t(p) 1 BOGIE! ";t(p): 1 BIRDIE! "; 1 ANY KEY TO PLAY AGAIN": 1 ALBATROSS " 1 A$="^^^^YOU WILL FIRST BE ASKED TO SELECT A CLUB. YOU HAVE A CHOICE OF IRONS 1 - 9, OR WOODS 1 AND 3 1 A$="^^WHEN YOU HAVE ENTERED THE PLAYERS' INITIALS (3 LETTERS), AND THE NUMBER OF HOLES THAT YOU WISH TO PLAY (UP TO 9) AN AERIAL VIEW OF THE FIRST FAIRWAY WILL APPEAR, WITH THE TEE ON THE LEFT REPRESENTED BY A CAPITAL ""T"". THE BALL IS THE SMALL DARK CIRCLE JUST TO THE RIGHT OF THE TEE, AND THE GREEN IS ON THE RIGHT HAND SIDE OF THE SCREEN." 1 A$="^^WHEN BOTH BALLS ARE ON THE GREEN A CLOSE UP VIEW WILL APPEAR. YOU THEN ENTER THE DISTANCE YOU WANT THE BALL TO TRAVEL (A SCALE WILL BE SHOWN), AND THE DIRECTION AS BEFORE.^^GOOD LUCK!!^ 1 A$="^^ROUGH^IF YOUR BALL LANDS IN THE ROUGH (DARK GREEN) YOU WILL HAVE TO TAKE GREAT CARE IN HITTING IT OUT. AS IN THE REAL GAME, THE BALL MAY NOT GO QUITE WHERE YOU EXPECT IT TO! IT SOMETIMES PAYS TO PLAY CAUTIOUSLY AND JUST MAKE SURE THAT YOU GET THE BALL BACK ON THE FAIRWAY WITH A GENTLE SHOT. ALTERNATIVELY, YOU MAY BE MORE ADVENTUROUS!" 1 A$="^OUT OF BOUNDS^LANDING OUT OF BOUNDS RESULTS IN A ONE STROKE PENALTY AND THE BALL BEING RETURNED TO WHERE IT WAS BEFORE YOU HIT IT.^^TO AVOID CONFUSION, THE BALL OF THE PERSON WHOSE TURN IT IS TO PLAY ALWAYS SHOWS AS DARK INSTEAD OF THE NORMAL WHITE." 1 A$="^ON YOUR WAY TO THE GREEN YOU MAY ENCOUNTER THE FOLLOWING HAZARDS......." 1 A$="^BEFORE YOU START YOU SHOULD HAVE A LOOK AT THE WIND STRENGTH AND DIRECTION .^THE STRENGTH VARIES FROM 0 (CALM) TO 7 (GALE), AND WILL AFFECT BOTH THE DISTANCE THE BALL TRAVELS AND THE DIRECTION THAT IT TRAVELS IN." 1 A$="YOU THEN HAVE TO CHOOSE A DIRECTION. IF YOU ARE NOT FAMILIAR WITH COMPASS HEADINGS USE THE GUIDE ON THE CASSETTE COVER.^^TO GO NORTH (TOWARDS THE TOP OF THE SCREEN) ENTER 0, TO GO EAST (RIGHT) ENTER 90, AND SO ON. ANY NUMBER IN BETWEEN THOSE SHOWN ON THE GUIDE MAY BE ENTERED FOR GREATER ACCURACY." 1 A$="THE GAME HAS BEEN DESIGNED TO BE AS REALISTIC AS POSSIBLE AND FEATURES TREES, THE DREADED ROUGH AND BUNKERS, AS WELL AS AN UNPREDICTABLE WIND, WHICH RANGES FROM A GENTLE BREEZE ON A GOOD DAY TO A HOWLING GALE." 1 A$="THE FAIRWAY IS THE LIGHT GREEN AREA." 1 A$="BUNKERS^THE BUNKERS HAVE A SIMILAR EFFECT ON THE BALL AS THE ROUGH.^TREES^IF THE BALL LANDS IN A TREE IT WILL BOUNCE OUT RANDOMLY. YOU MAY BE LUCKY AND BOUNCE ONTO THE GREEN OR YOU MAY BE UNLUCKY AND BOUNCE INTO THE ROUGH OR A BUNKER. NO STROKE PENALTY IS INCURRED." 1 ;"DO YOU REQUIRE INSTRUCTIONS?"; 1 99998....66 1 988888...66 1 666666666666666666666666666666666 1 /(())))))))))))),,, 1 -y(p))/ei): 1 )888...--66 1 ))))))))))))))))/// 1 )(,,,,,,,66,,,,,,,,,,,,,,,,,,,,,/,,,,,,,,66$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$66 66 66 66 ''' 66 '!''''' 66 gg`gg` 66``gg`gg````` 00000 66 `ggggg````` 00000 66 ```` 6000000000000000000000000000000008888888888888888888888888888888888888888888888888888888888888888 1 )()))))((((((((())) 1 )(((((...66 1 )(((((.-.66 1 )(((((((.66 1 (yf-y(p))^tw)): 1 (yf-y(j))^tw) 1 (xf-x(p))^tw+ 1 (xf-x(j))^tw+ 1 (x(n)/ei): 1 (tn+tw-a(p))^tw)): 1 (tn+fv-b(p))^tw+ 1 (da+fo*n-tn-tw)>z 1 (da+fo*n-tn-tw);" 1 (da+fo*n-tn-th)>z 1 (da+fo*n-tn-th);" 1 (da+fo*n-tn-fv)>z 1 (da+fo*n-tn-fv);" 1 (da+fo*n-tn-fo) 1 (a(p),b(p))=55 1 (a(p),b(p))=103 1 (FOR NON - GOLFERS, A WOOD HITS THE BALL FURTHER THAN AN IRON, AND A LOW NUMBER CLUB HITS THE BALL FURTHER THAN A HIGH NUMBER.)" 1 "WOOD OR IRON? (W/I) "; 1 "WHICH WOOD?(1 or 3) "; 1 "WHICH IRON(1 to 9) "; 1 "PLAYER 1 "; 1 "PITCH OR CHIP?(P/C)";p$: 1 "HOW MANY HOLES? ";h$: 1 "HARD OR SOFT?(H/S)";j$ 1 "ENTER DIRECTION"; 1 "DISTANCE?"; 1 "DIRECTION?"; 1 ";w$;"-WOOD" 1 ";n$(p);" TO PLAY": 1 ";n$(p);" TO PLAY" 1 ";i$;"-IRON" 1 "75"+fo*(y(n)-yf): 1 "6";"ENTER PLAYERS' NAMES"; 1 "500"+tw*(t(p)=j)+tw*(t(p)=ph-th)+tn*(t(p)=ph-tw)+ 1 "50"*(t(p)=ph+j) 1 "40"*(t(p)=ph)+ 1 "31800"+(h-j)* 1 "21",tw*tn;" 1 "20"*(t(p)=ph-j)+ 1 "18";n$(tw);":";s(tw) 1 "175"-y(n))/ei): 1 "17";"PAR:";ph;" 1 "123"-fo*(xf-x(n)): 1 "12",ei;"(MAX. 3 LETTERS)": 1 ".05",n*fv: